﻿Public Class clsWorkshopCurrent
    Public Function GetList() As DataTable
        Dim szSql As String = "SELECT * FROM sf.b_workshop_current where 1 = 1 "
        Return DBacs.ExecuteSql(szSql, -1)
    End Function
End Class
